home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 30 / Amiga Format AFCD30 (Sep 1998, Issue 114).iso / s / spat < prev    next >
AmigaDOS Script File  |  1997-02-27  |  314b  |  21 lines

  1. .key COM/A,PAT/A,OPT1,OPT2,OPT3,OPT4
  2. .bra {
  3. .ket }
  4.  
  5. ; $VER: SPat 40.1 (9.2.93)
  6. ; Do wildcards for single argument commands
  7.  
  8. FailAt 21
  9.  
  10. List >T:q{$$} {PAT} LFORMAT "{COM} *"%s%s*" {OPT1} {OPT2} {OPT3} {OPT4}"
  11.  
  12. IF NOT FAIL
  13.   Execute T:q{$$}
  14. Else
  15.   Echo "{PAT} not found"
  16. EndIF
  17.  
  18. Delete >NIL: T:q{$$} QUIET
  19.  
  20. FailAt 10
  21.